home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet internetowy / Pogoda z internetu / Program Pogoda 1.61 / pogoda-1.61.exe / {app} / pogoda.exe / 0 / RCDATA / TFORM1 / TFORM1.txt < prev   
Text File  |  2006-07-22  |  44KB  |  1,808 lines
  1. object Form1: TForm1
  2.   Left = 288
  3.   Top = 106
  4.   BorderIcons = [biSystemMenu, biMinimize]
  5.   BorderStyle = bsSingle
  6.   Caption = 'Pogoda'
  7.   ClientHeight = 383
  8.   ClientWidth = 601
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   KeyPreview = True
  16.   Menu = MainMenu1
  17.   OldCreateOrder = False
  18.   PopupMenu = PopupMenu2
  19.   Position = poDefault
  20.   Scaled = False
  21.   OnClose = FormClose
  22.   OnCreate = FormCreate
  23.   OnDestroy = FormDestroy
  24.   OnKeyPress = FormKeyPress
  25.   OnResize = FormResize
  26.   OnShow = FormShow
  27.   PixelsPerInch = 96
  28.   TextHeight = 13
  29.   object mPanel5: TPanel
  30.     Left = -1
  31.     Top = 259
  32.     Width = 602
  33.     Height = 31
  34.     BevelInner = bvRaised
  35.     BevelOuter = bvLowered
  36.     BevelWidth = 2
  37.     Color = clTeal
  38.     TabOrder = 5
  39.     object linki: TComboBox
  40.       Left = 104
  41.       Top = 5
  42.       Width = 385
  43.       Height = 21
  44.       Style = csDropDownList
  45.       Font.Charset = DEFAULT_CHARSET
  46.       Font.Color = clBlack
  47.       Font.Height = -11
  48.       Font.Name = 'MS Sans Serif'
  49.       Font.Style = []
  50.       ItemHeight = 13
  51.       ParentFont = False
  52.       TabOrder = 0
  53.       TabStop = False
  54.     end
  55.   end
  56.   object SG: TStringGrid
  57.     Left = -1
  58.     Top = 288
  59.     Width = 602
  60.     Height = 75
  61.     ColCount = 6
  62.     DefaultRowHeight = 16
  63.     FixedCols = 0
  64.     RowCount = 2
  65.     Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
  66.     PopupMenu = PopupMenu3
  67.     ScrollBars = ssVertical
  68.     TabOrder = 6
  69.     OnDblClick = SGDblClick
  70.     OnSelectCell = SGSelectCell
  71.     ColWidths = (
  72.       114
  73.       37
  74.       140
  75.       107
  76.       75
  77.       111)
  78.   end
  79.   object SB11: TsPanel
  80.     Left = 0
  81.     Top = 364
  82.     Width = 201
  83.     Height = 19
  84.     Alignment = taLeftJustify
  85.     Font.Charset = DEFAULT_CHARSET
  86.     Font.Color = clWindowText
  87.     Font.Height = -11
  88.     Font.Name = 'MS Sans Serif'
  89.     Font.Style = []
  90.     ParentFont = False
  91.     TabOrder = 7
  92.     SkinData.SkinSection = 'PANEL'
  93.     object SB1: TsLabel
  94.       Left = 8
  95.       Top = 3
  96.       Width = 90
  97.       Height = 13
  98.       Caption = '                              '
  99.     end
  100.   end
  101.   object SB21: TsPanel
  102.     Left = 199
  103.     Top = 364
  104.     Width = 402
  105.     Height = 19
  106.     Alignment = taLeftJustify
  107.     Font.Charset = DEFAULT_CHARSET
  108.     Font.Color = clWindowText
  109.     Font.Height = -11
  110.     Font.Name = 'MS Sans Serif'
  111.     Font.Style = []
  112.     ParentFont = False
  113.     TabOrder = 8
  114.     SkinData.SkinSection = 'PANEL'
  115.     object SB2: TsLabel
  116.       Left = 8
  117.       Top = 3
  118.       Width = 96
  119.       Height = 13
  120.       Caption = '                                '
  121.     end
  122.   end
  123.   object mPanel1: TsPanel
  124.     Left = 441
  125.     Top = 0
  126.     Width = 160
  127.     Height = 57
  128.     TabOrder = 0
  129.     SkinData.SkinSection = 'PANEL'
  130.     object opoz: TsLabelFX
  131.       Left = 8
  132.       Top = 39
  133.       Width = 145
  134.       Height = 21
  135.       Alignment = taCenter
  136.       AutoSize = False
  137.       Caption = 'opoz'
  138.       Kind.KindType = ktCustom
  139.     end
  140.     object godzina: TsLabelFX
  141.       Left = 8
  142.       Top = -1
  143.       Width = 145
  144.       Height = 28
  145.       Alignment = taCenter
  146.       AutoSize = False
  147.       Caption = 'godzina'
  148.       ParentFont = False
  149.       Kind.KindType = ktCustom
  150.       Font.Charset = DEFAULT_CHARSET
  151.       Font.Color = clWindowText
  152.       Font.Height = -16
  153.       Font.Name = 'MS Sans Serif'
  154.       Font.Style = []
  155.     end
  156.     object data: TsLabelFX
  157.       Left = 8
  158.       Top = 18
  159.       Width = 145
  160.       Height = 28
  161.       Alignment = taCenter
  162.       AutoSize = False
  163.       Caption = 'data'
  164.       ParentFont = False
  165.       Kind.KindType = ktCustom
  166.       Font.Charset = DEFAULT_CHARSET
  167.       Font.Color = clWindowText
  168.       Font.Height = -16
  169.       Font.Name = 'MS Sans Serif'
  170.       Font.Style = []
  171.     end
  172.   end
  173.   object mPanel2: TsPanel
  174.     Left = 0
  175.     Top = 0
  176.     Width = 441
  177.     Height = 57
  178.     PopupMenu = PopupMenu5
  179.     TabOrder = 1
  180.     SkinData.SkinSection = 'PANEL'
  181.     object stacja: TsLabelFX
  182.       Left = 8
  183.       Top = -2
  184.       Width = 60
  185.       Height = 28
  186.       Caption = 'stacja'
  187.       ParentFont = False
  188.       ParentShowHint = False
  189.       ShowHint = True
  190.       Kind.KindType = ktCustom
  191.       Font.Charset = DEFAULT_CHARSET
  192.       Font.Color = clWindowText
  193.       Font.Height = -16
  194.       Font.Name = 'MS Sans Serif'
  195.       Font.Style = [fsBold]
  196.     end
  197.     object stacja1: TsLabelFX
  198.       Left = 8
  199.       Top = 22
  200.       Width = 50
  201.       Height = 21
  202.       Caption = 'stacja1'
  203.       ParentFont = False
  204.       Kind.KindType = ktCustom
  205.       Kind.Color = clYellow
  206.       Font.Charset = DEFAULT_CHARSET
  207.       Font.Color = clWindowText
  208.       Font.Height = -11
  209.       Font.Name = 'MS Sans Serif'
  210.       Font.Style = [fsBold]
  211.     end
  212.     object uaktualniono: TsLabelFX
  213.       Left = 8
  214.       Top = 39
  215.       Width = 161
  216.       Height = 21
  217.       AutoSize = False
  218.       Caption = 'uaktualniono'
  219.       ParentFont = False
  220.       Kind.KindType = ktCustom
  221.       Kind.Color = clLime
  222.       Font.Charset = DEFAULT_CHARSET
  223.       Font.Color = clWindowText
  224.       Font.Height = -11
  225.       Font.Name = 'MS Sans Serif'
  226.       Font.Style = [fsBold]
  227.     end
  228.     object Label1: TsLabelFX
  229.       Left = 397
  230.       Top = 24
  231.       Width = 40
  232.       Height = 21
  233.       Cursor = crHandPoint
  234.       Alignment = taRightJustify
  235.       AutoSize = False
  236.       Caption = 'Mapa'
  237.       ParentFont = False
  238.       OnClick = Label1Click
  239.       Kind.KindType = ktCustom
  240.       Kind.Color = clYellow
  241.       Font.Charset = DEFAULT_CHARSET
  242.       Font.Color = clWindowText
  243.       Font.Height = -11
  244.       Font.Name = 'MS Sans Serif'
  245.       Font.Style = [fsBold, fsUnderline]
  246.     end
  247.     object ostatnie: TsLabelFX
  248.       Left = 264
  249.       Top = 40
  250.       Width = 173
  251.       Height = 21
  252.       Alignment = taRightJustify
  253.       AutoSize = False
  254.       Caption = 'ostatnie'
  255.       ParentFont = False
  256.       Kind.KindType = ktCustom
  257.       Kind.Color = clLime
  258.       Font.Charset = DEFAULT_CHARSET
  259.       Font.Color = clWindowText
  260.       Font.Height = -11
  261.       Font.Name = 'MS Sans Serif'
  262.       Font.Style = [fsBold]
  263.     end
  264.   end
  265.   object mPanel3: TsPanel
  266.     Left = 0
  267.     Top = 57
  268.     Width = 601
  269.     Height = 203
  270.     TabOrder = 2
  271.     SkinData.SkinSection = 'PANEL'
  272.     object kompas1: TImage
  273.       Left = 416
  274.       Top = 24
  275.       Width = 100
  276.       Height = 100
  277.       Transparent = True
  278.     end
  279.     object Label11: TLabel
  280.       Left = 479
  281.       Top = 2
  282.       Width = 118
  283.       Height = 13
  284.       Cursor = crHandPoint
  285.       Alignment = taRightJustify
  286.       Caption = 'www.wunderground.com'
  287.       Font.Charset = DEFAULT_CHARSET
  288.       Font.Color = clMaroon
  289.       Font.Height = -11
  290.       Font.Name = 'MS Sans Serif'
  291.       Font.Style = []
  292.       ParentFont = False
  293.       ParentShowHint = False
  294.       PopupMenu = PopupMenu4
  295.       ShowHint = True
  296.       Transparent = True
  297.       OnClick = Label11Click
  298.     end
  299.     object t_temp2: TImage
  300.       Left = 120
  301.       Top = 98
  302.       Width = 16
  303.       Height = 16
  304.       ParentShowHint = False
  305.       ShowHint = True
  306.       Transparent = True
  307.     end
  308.     object t_wiatr: TImage
  309.       Left = 376
  310.       Top = 4
  311.       Width = 16
  312.       Height = 16
  313.       ParentShowHint = False
  314.       ShowHint = True
  315.       Transparent = True
  316.     end
  317.     object t_cisnienie: TImage
  318.       Left = 376
  319.       Top = 28
  320.       Width = 16
  321.       Height = 16
  322.       ParentShowHint = False
  323.       ShowHint = True
  324.       Transparent = True
  325.     end
  326.     object t_wilgotnosc: TImage
  327.       Left = 376
  328.       Top = 76
  329.       Width = 16
  330.       Height = 16
  331.       ParentShowHint = False
  332.       ShowHint = True
  333.       Transparent = True
  334.     end
  335.     object t_rosa: TImage
  336.       Left = 376
  337.       Top = 52
  338.       Width = 16
  339.       Height = 16
  340.       ParentShowHint = False
  341.       ShowHint = True
  342.       Transparent = True
  343.     end
  344.     object t_widzialnosc: TImage
  345.       Left = 376
  346.       Top = 100
  347.       Width = 16
  348.       Height = 16
  349.       ParentShowHint = False
  350.       ShowHint = True
  351.       Transparent = True
  352.     end
  353.     object biomet: TImage
  354.       Left = 72
  355.       Top = 126
  356.       Width = 33
  357.       Height = 17
  358.       AutoSize = True
  359.       Transparent = True
  360.     end
  361.     object baza: TLabel
  362.       Left = 464
  363.       Top = 0
  364.       Width = 7
  365.       Height = 14
  366.       Caption = 'B'
  367.       Font.Charset = EASTEUROPE_CHARSET
  368.       Font.Color = clYellow
  369.       Font.Height = -11
  370.       Font.Name = 'Arial'
  371.       Font.Style = []
  372.       ParentFont = False
  373.       ParentShowHint = False
  374.       ShowHint = True
  375.       Transparent = True
  376.     end
  377.     object temp1: TsLabelFX
  378.       Left = 33
  379.       Top = 33
  380.       Width = 89
  381.       Height = 28
  382.       Alignment = taCenter
  383.       AutoSize = False
  384.       Caption = '- - -'
  385.       ParentFont = False
  386.       ParentShowHint = False
  387.       ShowHint = True
  388.       Kind.KindType = ktCustom
  389.       Kind.Color = clBlue
  390.       Font.Charset = DEFAULT_CHARSET
  391.       Font.Color = clWindowText
  392.       Font.Height = -19
  393.       Font.Name = 'MS Sans Serif'
  394.       Font.Style = [fsBold]
  395.     end
  396.     object temp2: TsLabelFX
  397.       Left = 33
  398.       Top = 93
  399.       Width = 89
  400.       Height = 28
  401.       Alignment = taCenter
  402.       AutoSize = False
  403.       Caption = '- - -'
  404.       ParentFont = False
  405.       ParentShowHint = False
  406.       ShowHint = True
  407.       Visible = False
  408.       Kind.KindType = ktCustom
  409.       Kind.Color = clBlue
  410.       Font.Charset = DEFAULT_CHARSET
  411.       Font.Color = clWindowText
  412.       Font.Height = -19
  413.       Font.Name = 'MS Sans Serif'
  414.       Font.Style = [fsBold]
  415.     end
  416.     object label14: TsLabelFX
  417.       Left = 32
  418.       Top = -1
  419.       Width = 91
  420.       Height = 38
  421.       Alignment = taCenter
  422.       AutoSize = False
  423.       Caption = 'Temperatura   powietrza:'
  424.       ParentFont = False
  425.       WordWrap = True
  426.       Kind.KindType = ktCustom
  427.       Kind.Color = clAqua
  428.       Font.Charset = DEFAULT_CHARSET
  429.       Font.Color = clWindowText
  430.       Font.Height = -12
  431.       Font.Name = 'Arial'
  432.       Font.Style = [fsBold]
  433.     end
  434.     object t_temp1: TImage
  435.       Left = 120
  436.       Top = 38
  437.       Width = 16
  438.       Height = 16
  439.       ParentShowHint = False
  440.       ShowHint = True
  441.       Transparent = True
  442.     end
  443.     object label15: TsLabelFX
  444.       Left = 35
  445.       Top = 58
  446.       Width = 85
  447.       Height = 38
  448.       Alignment = taCenter
  449.       Caption = 'Temperatura odczuwalna:'
  450.       ParentFont = False
  451.       WordWrap = True
  452.       Kind.KindType = ktCustom
  453.       Kind.Color = clAqua
  454.       Font.Charset = DEFAULT_CHARSET
  455.       Font.Color = clWindowText
  456.       Font.Height = -12
  457.       Font.Name = 'Arial'
  458.       Font.Style = [fsBold]
  459.     end
  460.     object label36: TsLabelFX
  461.       Left = 126
  462.       Top = 126
  463.       Width = 94
  464.       Height = 23
  465.       Alignment = taRightJustify
  466.       AutoSize = False
  467.       Caption = ' Zachmurzenie:'
  468.       ParentFont = False
  469.       Kind.KindType = ktCustom
  470.       Kind.Color = clAqua
  471.       Font.Charset = DEFAULT_CHARSET
  472.       Font.Color = clWindowText
  473.       Font.Height = -12
  474.       Font.Name = 'Arial'
  475.       Font.Style = [fsBold]
  476.     end
  477.     object chmury: TsLabelFX
  478.       Left = 230
  479.       Top = 126
  480.       Width = 144
  481.       Height = 22
  482.       AutoSize = False
  483.       Caption = '----'
  484.       ParentFont = False
  485.       ParentShowHint = False
  486.       ShowHint = True
  487.       Kind.KindType = ktCustom
  488.       Kind.Color = clYellow
  489.       Font.Charset = DEFAULT_CHARSET
  490.       Font.Color = clWindowText
  491.       Font.Height = -12
  492.       Font.Name = 'Arial'
  493.       Font.Style = [fsBold]
  494.     end
  495.     object label22: TsLabelFX
  496.       Left = 6
  497.       Top = 164
  498.       Width = 124
  499.       Height = 23
  500.       AutoSize = False
  501.       Caption = ' Warunki pogodowe:'
  502.       ParentFont = False
  503.       Kind.KindType = ktCustom
  504.       Kind.Color = clAqua
  505.       Font.Charset = DEFAULT_CHARSET
  506.       Font.Color = clWindowText
  507.       Font.Height = -12
  508.       Font.Name = 'Arial'
  509.       Font.Style = [fsBold]
  510.     end
  511.     object warunki_pogodowe: TsLabelFX
  512.       Left = 8
  513.       Top = 183
  514.       Width = 385
  515.       Height = 22
  516.       AutoSize = False
  517.       Caption = '----'
  518.       ParentFont = False
  519.       ParentShowHint = False
  520.       ShowHint = True
  521.       Kind.KindType = ktCustom
  522.       Kind.Color = clYellow
  523.       Font.Charset = DEFAULT_CHARSET
  524.       Font.Color = clWindowText
  525.       Font.Height = -12
  526.       Font.Name = 'Arial'
  527.       Font.Style = [fsBold]
  528.     end
  529.     object Label12: TsLabelFX
  530.       Left = 6
  531.       Top = 126
  532.       Width = 54
  533.       Height = 23
  534.       AutoSize = False
  535.       Caption = ' Biomet:'
  536.       ParentFont = False
  537.       Kind.KindType = ktCustom
  538.       Kind.Color = clAqua
  539.       Font.Charset = DEFAULT_CHARSET
  540.       Font.Color = clWindowText
  541.       Font.Height = -12
  542.       Font.Name = 'Arial'
  543.       Font.Style = [fsBold]
  544.     end
  545.     object Label6: TsLabelFX
  546.       Left = 190
  547.       Top = 151
  548.       Width = 30
  549.       Height = 23
  550.       Alignment = taRightJustify
  551.       AutoSize = False
  552.       Caption = ' UV:'
  553.       ParentFont = False
  554.       Kind.KindType = ktCustom
  555.       Kind.Color = clAqua
  556.       Font.Charset = DEFAULT_CHARSET
  557.       Font.Color = clWindowText
  558.       Font.Height = -12
  559.       Font.Name = 'Arial'
  560.       Font.Style = [fsBold]
  561.     end
  562.     object UV: TsLabelFX
  563.       Left = 230
  564.       Top = 151
  565.       Width = 62
  566.       Height = 23
  567.       AutoSize = False
  568.       Caption = '----'
  569.       ParentFont = False
  570.       ParentShowHint = False
  571.       ShowHint = True
  572.       Kind.KindType = ktCustom
  573.       Kind.Color = clYellow
  574.       Font.Charset = DEFAULT_CHARSET
  575.       Font.Color = clWindowText
  576.       Font.Height = -12
  577.       Font.Name = 'Arial'
  578.       Font.Style = [fsBold]
  579.     end
  580.     object Label19: TsLabelFX
  581.       Left = 175
  582.       Top = 1
  583.       Width = 45
  584.       Height = 23
  585.       Alignment = taRightJustify
  586.       AutoSize = False
  587.       Caption = ' Wiatr:'
  588.       ParentFont = False
  589.       Kind.KindType = ktCustom
  590.       Kind.Color = clAqua
  591.       Font.Charset = DEFAULT_CHARSET
  592.       Font.Color = clWindowText
  593.       Font.Height = -12
  594.       Font.Name = 'Arial'
  595.       Font.Style = [fsBold]
  596.     end
  597.     object wiatr: TsLabelFX
  598.       Left = 230
  599.       Top = 1
  600.       Width = 148
  601.       Height = 23
  602.       AutoSize = False
  603.       Caption = '----'
  604.       ParentFont = False
  605.       ParentShowHint = False
  606.       ShowHint = True
  607.       Kind.KindType = ktCustom
  608.       Kind.Color = clYellow
  609.       Font.Charset = DEFAULT_CHARSET
  610.       Font.Color = clWindowText
  611.       Font.Height = -12
  612.       Font.Name = 'Arial'
  613.       Font.Style = [fsBold]
  614.     end
  615.     object Label37: TsLabelFX
  616.       Left = 424
  617.       Top = 66
  618.       Width = 23
  619.       Height = 24
  620.       AutoSize = False
  621.       Caption = 'W'
  622.       ParentFont = False
  623.       Font.Charset = DEFAULT_CHARSET
  624.       Font.Color = clWindowText
  625.       Font.Height = -13
  626.       Font.Name = 'MS Sans Serif'
  627.       Font.Style = [fsBold]
  628.     end
  629.     object Label38: TsLabelFX
  630.       Left = 491
  631.       Top = 66
  632.       Width = 18
  633.       Height = 24
  634.       Alignment = taRightJustify
  635.       AutoSize = False
  636.       Caption = 'E'
  637.       ParentFont = False
  638.       Font.Charset = DEFAULT_CHARSET
  639.       Font.Color = clWindowText
  640.       Font.Height = -13
  641.       Font.Name = 'MS Sans Serif'
  642.       Font.Style = [fsBold]
  643.     end
  644.     object Label39: TsLabelFX
  645.       Left = 460
  646.       Top = 31
  647.       Width = 20
  648.       Height = 24
  649.       AutoSize = False
  650.       Caption = 'N'
  651.       ParentFont = False
  652.       Font.Charset = DEFAULT_CHARSET
  653.       Font.Color = clWindowText
  654.       Font.Height = -13
  655.       Font.Name = 'MS Sans Serif'
  656.       Font.Style = [fsBold]
  657.     end
  658.     object Label40: TsLabelFX
  659.       Left = 460
  660.       Top = 97
  661.       Width = 19
  662.       Height = 21
  663.       AutoSize = False
  664.       Caption = 'S'
  665.       ParentFont = False
  666.       Font.Charset = DEFAULT_CHARSET
  667.       Font.Color = clWindowText
  668.       Font.Height = -13
  669.       Font.Name = 'MS Sans Serif'
  670.       Font.Style = [fsBold]
  671.     end
  672.     object Label21: TsLabelFX
  673.       Left = 154
  674.       Top = 26
  675.       Width = 66
  676.       Height = 23
  677.       Alignment = taRightJustify
  678.       AutoSize = False
  679.       Caption = ' Ci'#347'nienie:'
  680.       ParentFont = False
  681.       Kind.KindType = ktCustom
  682.       Kind.Color = clAqua
  683.       Font.Charset = DEFAULT_CHARSET
  684.       Font.Color = clWindowText
  685.       Font.Height = -12
  686.       Font.Name = 'Arial'
  687.       Font.Style = [fsBold]
  688.     end
  689.     object cisnienie: TsLabelFX
  690.       Left = 230
  691.       Top = 26
  692.       Width = 100
  693.       Height = 23
  694.       AutoSize = False
  695.       Caption = '----'
  696.       ParentFont = False
  697.       ParentShowHint = False
  698.       ShowHint = True
  699.       Kind.KindType = ktCustom
  700.       Kind.Color = clYellow
  701.       Font.Charset = DEFAULT_CHARSET
  702.       Font.Color = clWindowText
  703.       Font.Height = -12
  704.       Font.Name = 'Arial'
  705.       Font.Style = [fsBold]
  706.     end
  707.     object Label17: TsLabelFX
  708.       Left = 142
  709.       Top = 75
  710.       Width = 78
  711.       Height = 23
  712.       Alignment = taRightJustify
  713.       AutoSize = False
  714.       Caption = ' Wilgotno'#347#263':'
  715.       ParentFont = False
  716.       Kind.KindType = ktCustom
  717.       Kind.Color = clAqua
  718.       Font.Charset = DEFAULT_CHARSET
  719.       Font.Color = clWindowText
  720.       Font.Height = -12
  721.       Font.Name = 'Arial'
  722.       Font.Style = [fsBold]
  723.     end
  724.     object wilgotnosc: TsLabelFX
  725.       Left = 230
  726.       Top = 75
  727.       Width = 100
  728.       Height = 23
  729.       AutoSize = False
  730.       Caption = '----'
  731.       ParentFont = False
  732.       ParentShowHint = False
  733.       ShowHint = True
  734.       Kind.KindType = ktCustom
  735.       Kind.Color = clYellow
  736.       Font.Charset = DEFAULT_CHARSET
  737.       Font.Color = clWindowText
  738.       Font.Height = -12
  739.       Font.Name = 'Arial'
  740.       Font.Style = [fsBold]
  741.     end
  742.     object Label18: TsLabelFX
  743.       Left = 145
  744.       Top = 51
  745.       Width = 75
  746.       Height = 23
  747.       Alignment = taRightJustify
  748.       AutoSize = False
  749.       Caption = ' Punkt rosy:'
  750.       ParentFont = False
  751.       Kind.KindType = ktCustom
  752.       Kind.Color = clAqua
  753.       Font.Charset = DEFAULT_CHARSET
  754.       Font.Color = clWindowText
  755.       Font.Height = -12
  756.       Font.Name = 'Arial'
  757.       Font.Style = [fsBold]
  758.     end
  759.     object punkt_rosy: TsLabelFX
  760.       Left = 230
  761.       Top = 51
  762.       Width = 100
  763.       Height = 23
  764.       AutoSize = False
  765.       Caption = '----'
  766.       ParentFont = False
  767.       ParentShowHint = False
  768.       ShowHint = True
  769.       Kind.KindType = ktCustom
  770.       Kind.Color = clYellow
  771.       Font.Charset = DEFAULT_CHARSET
  772.       Font.Color = clWindowText
  773.       Font.Height = -12
  774.       Font.Name = 'Arial'
  775.       Font.Style = [fsBold]
  776.     end
  777.     object Label23: TsLabelFX
  778.       Left = 137
  779.       Top = 101
  780.       Width = 83
  781.       Height = 23
  782.       Alignment = taRightJustify
  783.       AutoSize = False
  784.       Caption = ' Widzialno'#347#263':'
  785.       ParentFont = False
  786.       Kind.KindType = ktCustom
  787.       Kind.Color = clAqua
  788.       Font.Charset = DEFAULT_CHARSET
  789.       Font.Color = clWindowText
  790.       Font.Height = -12
  791.       Font.Name = 'Arial'
  792.       Font.Style = [fsBold]
  793.     end
  794.     object widzialnosc: TsLabelFX
  795.       Left = 230
  796.       Top = 101
  797.       Width = 100
  798.       Height = 23
  799.       AutoSize = False
  800.       Caption = '----'
  801.       ParentFont = False
  802.       ParentShowHint = False
  803.       ShowHint = True
  804.       Kind.KindType = ktCustom
  805.       Kind.Color = clYellow
  806.       Font.Charset = DEFAULT_CHARSET
  807.       Font.Color = clWindowText
  808.       Font.Height = -12
  809.       Font.Name = 'Arial'
  810.       Font.Style = [fsBold]
  811.     end
  812.     object ICM_1: TsBitBtn
  813.       Left = 550
  814.       Top = 16
  815.       Width = 46
  816.       Height = 19
  817.       Hint = 'Meteorogram z ICM-u'
  818.       Caption = 'ICM'
  819.       Font.Charset = DEFAULT_CHARSET
  820.       Font.Color = clBlack
  821.       Font.Height = -11
  822.       Font.Name = 'MS Sans Serif'
  823.       Font.Style = []
  824.       ParentFont = False
  825.       ParentShowHint = False
  826.       ShowHint = True
  827.       TabOrder = 0
  828.       OnClick = mm1Click
  829.       Spacing = 3
  830.       SkinData.SkinSection = 'BUTTON'
  831.       DisabledGlyphKind = []
  832.       ShowFocus = False
  833.     end
  834.     object Radar_1: TsBitBtn
  835.       Left = 550
  836.       Top = 40
  837.       Width = 46
  838.       Height = 19
  839.       Hint = 'Mapa radarowa Polski'
  840.       Caption = 'Radar'
  841.       Font.Charset = DEFAULT_CHARSET
  842.       Font.Color = clBlack
  843.       Font.Height = -11
  844.       Font.Name = 'MS Sans Serif'
  845.       Font.Style = []
  846.       ParentFont = False
  847.       ParentShowHint = False
  848.       ShowHint = True
  849.       TabOrder = 1
  850.       OnClick = Maparadarowa1Click
  851.       Spacing = 3
  852.       SkinData.SkinSection = 'BUTTON'
  853.       DisabledGlyphKind = []
  854.       ShowFocus = False
  855.     end
  856.     object sBitBtn1: TsBitBtn
  857.       Left = 550
  858.       Top = 64
  859.       Width = 46
  860.       Height = 19
  861.       Caption = 'Astro'
  862.       Font.Charset = DEFAULT_CHARSET
  863.       Font.Color = clBlack
  864.       Font.Height = -11
  865.       Font.Name = 'MS Sans Serif'
  866.       Font.Style = []
  867.       ParentFont = False
  868.       ParentShowHint = False
  869.       ShowHint = True
  870.       TabOrder = 2
  871.       OnMouseDown = sBitBtn1MouseDown
  872.       OnMouseUp = sBitBtn1MouseUp
  873.       Spacing = 3
  874.       SkinData.SkinSection = 'BUTTON'
  875.       DisabledGlyphKind = []
  876.       ShowFocus = False
  877.     end
  878.     object sBitBtn2: TsBitBtn
  879.       Left = 550
  880.       Top = 112
  881.       Width = 46
  882.       Height = 19
  883.       Caption = 'Historia'
  884.       Default = True
  885.       Font.Charset = DEFAULT_CHARSET
  886.       Font.Color = clBlack
  887.       Font.Height = -11
  888.       Font.Name = 'MS Sans Serif'
  889.       Font.Style = []
  890.       ModalResult = 1
  891.       ParentFont = False
  892.       ParentShowHint = False
  893.       ShowHint = True
  894.       TabOrder = 3
  895.       Visible = False
  896.       OnClick = sBitBtn2Click
  897.       NumGlyphs = 2
  898.       Spacing = 3
  899.       SkinData.SkinSection = 'BUTTON'
  900.       DisabledGlyphKind = []
  901.       ShowFocus = False
  902.     end
  903.   end
  904.   object mPanel6: TsPanel
  905.     Left = 401
  906.     Top = 193
  907.     Width = 198
  908.     Height = 67
  909.     Hint = 'Prognoza pogody na najbli'#380'sze godziny'
  910.     ParentShowHint = False
  911.     ShowHint = True
  912.     TabOrder = 4
  913.     SkinData.SkinSection = 'PANEL'
  914.     object onet_warunki: TImage
  915.       Left = 3
  916.       Top = 16
  917.       Width = 28
  918.       Height = 24
  919.       AutoSize = True
  920.       Transparent = True
  921.     end
  922.     object onet_zt: TImage
  923.       Left = 99
  924.       Top = 20
  925.       Width = 14
  926.       Height = 9
  927.       Transparent = True
  928.     end
  929.     object onet_zc: TImage
  930.       Left = 179
  931.       Top = 20
  932.       Width = 14
  933.       Height = 9
  934.       Transparent = True
  935.     end
  936.     object onet_zw: TImage
  937.       Left = 139
  938.       Top = 35
  939.       Width = 14
  940.       Height = 9
  941.       Transparent = True
  942.     end
  943.     object onet_kw: TImage
  944.       Left = 155
  945.       Top = 32
  946.       Width = 14
  947.       Height = 9
  948.       Transparent = True
  949.     end
  950.     object onet_pora: TsLabelFX
  951.       Left = 2
  952.       Top = 0
  953.       Width = 113
  954.       Height = 21
  955.       AutoSize = False
  956.       Caption = 'onet_pora'
  957.       ParentFont = False
  958.       Kind.KindType = ktCustom
  959.       Kind.Color = clAqua
  960.       Font.Charset = DEFAULT_CHARSET
  961.       Font.Color = clWindowText
  962.       Font.Height = -9
  963.       Font.Name = 'MS Sans Serif'
  964.       Font.Style = []
  965.     end
  966.     object Label4: TsLabelFX
  967.       Left = 152
  968.       Top = 0
  969.       Width = 40
  970.       Height = 21
  971.       Cursor = crHandPoint
  972.       AutoSize = False
  973.       Caption = 'onet.pl'
  974.       ParentFont = False
  975.       OnClick = Label4Click
  976.       Kind.KindType = ktCustom
  977.       Kind.Color = clYellow
  978.       Font.Charset = DEFAULT_CHARSET
  979.       Font.Color = clWindowText
  980.       Font.Height = -9
  981.       Font.Name = 'MS Sans Serif'
  982.       Font.Style = []
  983.     end
  984.     object Label3: TsLabelFX
  985.       Left = 32
  986.       Top = 30
  987.       Width = 36
  988.       Height = 21
  989.       Caption = 'Wiatr:'
  990.       ParentFont = False
  991.       Kind.KindType = ktCustom
  992.       Kind.Color = clAqua
  993.       Font.Charset = DEFAULT_CHARSET
  994.       Font.Color = clWindowText
  995.       Font.Height = -9
  996.       Font.Name = 'MS Sans Serif'
  997.       Font.Style = []
  998.     end
  999.     object onet_wiatr: TsLabelFX
  1000.       Left = 72
  1001.       Top = 30
  1002.       Width = 57
  1003.       Height = 21
  1004.       Caption = 'onet_wiatr'
  1005.       ParentFont = False
  1006.       Kind.KindType = ktCustom
  1007.       Kind.Color = clYellow
  1008.       Font.Charset = DEFAULT_CHARSET
  1009.       Font.Color = clWindowText
  1010.       Font.Height = -9
  1011.       Font.Name = 'MS Sans Serif'
  1012.       Font.Style = []
  1013.     end
  1014.     object Label7: TsLabelFX
  1015.       Left = 2
  1016.       Top = 46
  1017.       Width = 46
  1018.       Height = 21
  1019.       Caption = 'Deszcz:'
  1020.       ParentFont = False
  1021.       Kind.KindType = ktCustom
  1022.       Kind.Color = clAqua
  1023.       Font.Charset = DEFAULT_CHARSET
  1024.       Font.Color = clWindowText
  1025.       Font.Height = -9
  1026.       Font.Name = 'MS Sans Serif'
  1027.       Font.Style = []
  1028.     end
  1029.     object Label9: TsLabelFX
  1030.       Left = 98
  1031.       Top = 46
  1032.       Width = 38
  1033.       Height = 21
  1034.       Caption = #346'nieg:'
  1035.       ParentFont = False
  1036.       Kind.KindType = ktCustom
  1037.       Kind.Color = clAqua
  1038.       Font.Charset = DEFAULT_CHARSET
  1039.       Font.Color = clWindowText
  1040.       Font.Height = -9
  1041.       Font.Name = 'MS Sans Serif'
  1042.       Font.Style = []
  1043.     end
  1044.     object onet_snieg: TsLabelFX
  1045.       Left = 130
  1046.       Top = 46
  1047.       Width = 60
  1048.       Height = 21
  1049.       Caption = 'onet_snieg'
  1050.       ParentFont = False
  1051.       Kind.KindType = ktCustom
  1052.       Kind.Color = clYellow
  1053.       Font.Charset = DEFAULT_CHARSET
  1054.       Font.Color = clWindowText
  1055.       Font.Height = -9
  1056.       Font.Name = 'MS Sans Serif'
  1057.       Font.Style = []
  1058.     end
  1059.     object onet_opady: TsLabelFX
  1060.       Left = 42
  1061.       Top = 46
  1062.       Width = 64
  1063.       Height = 21
  1064.       Caption = 'onet_opady'
  1065.       ParentFont = False
  1066.       Kind.KindType = ktCustom
  1067.       Kind.Color = clYellow
  1068.       Font.Charset = DEFAULT_CHARSET
  1069.       Font.Color = clWindowText
  1070.       Font.Height = -9
  1071.       Font.Name = 'MS Sans Serif'
  1072.       Font.Style = []
  1073.     end
  1074.     object onet_temp: TsLabelFX
  1075.       Left = 32
  1076.       Top = 14
  1077.       Width = 58
  1078.       Height = 21
  1079.       Caption = 'onet_temp'
  1080.       ParentFont = False
  1081.       Kind.KindType = ktCustom
  1082.       Kind.Color = clYellow
  1083.       Font.Charset = DEFAULT_CHARSET
  1084.       Font.Color = clWindowText
  1085.       Font.Height = -9
  1086.       Font.Name = 'MS Sans Serif'
  1087.       Font.Style = []
  1088.     end
  1089.     object onet_cisnienie: TsLabelFX
  1090.       Left = 120
  1091.       Top = 14
  1092.       Width = 76
  1093.       Height = 21
  1094.       Caption = 'onet_cisnienie'
  1095.       ParentFont = False
  1096.       Kind.KindType = ktCustom
  1097.       Kind.Color = clYellow
  1098.       Font.Charset = DEFAULT_CHARSET
  1099.       Font.Color = clWindowText
  1100.       Font.Height = -9
  1101.       Font.Name = 'MS Sans Serif'
  1102.       Font.Style = []
  1103.     end
  1104.   end
  1105.   object astroP: TsPanel
  1106.     Left = 185
  1107.     Top = 257
  1108.     Width = 198
  1109.     Height = 136
  1110.     TabOrder = 3
  1111.     Visible = False
  1112.     SkinData.SkinSection = 'PANEL'
  1113.     object ksiezyc: TImage
  1114.       Left = 8
  1115.       Top = 84
  1116.       Width = 49
  1117.       Height = 41
  1118.       AutoSize = True
  1119.       ParentShowHint = False
  1120.       ShowHint = False
  1121.     end
  1122.     object Label10: TsLabelFX
  1123.       Left = 13
  1124.       Top = -3
  1125.       Width = 181
  1126.       Height = 28
  1127.       AutoSize = False
  1128.       Caption = 'Dane astronomiczne'
  1129.       ParentFont = False
  1130.       Kind.KindType = ktCustom
  1131.       Font.Charset = DEFAULT_CHARSET
  1132.       Font.Color = clWindowText
  1133.       Font.Height = -16
  1134.       Font.Name = 'MS Sans Serif'
  1135.       Font.Style = [fsBold, fsUnderline]
  1136.     end
  1137.     object Label8: TsLabelFX
  1138.       Left = 8
  1139.       Top = 24
  1140.       Width = 75
  1141.       Height = 21
  1142.       AutoSize = False
  1143.       Caption = 'D'#322'ugo'#347#263' dnia:'
  1144.       ParentFont = False
  1145.       Kind.KindType = ktCustom
  1146.       Kind.Color = clAqua
  1147.       Font.Charset = DEFAULT_CHARSET
  1148.       Font.Color = clWindowText
  1149.       Font.Height = -11
  1150.       Font.Name = 'MS Sans Serif'
  1151.       Font.Style = []
  1152.     end
  1153.     object Label2: TsLabelFX
  1154.       Left = 8
  1155.       Top = 40
  1156.       Width = 46
  1157.       Height = 21
  1158.       AutoSize = False
  1159.       Caption = 'S'#322'o'#324'ce:'
  1160.       ParentFont = False
  1161.       Kind.KindType = ktCustom
  1162.       Kind.Color = clAqua
  1163.       Font.Charset = DEFAULT_CHARSET
  1164.       Font.Color = clWindowText
  1165.       Font.Height = -11
  1166.       Font.Name = 'MS Sans Serif'
  1167.       Font.Style = []
  1168.     end
  1169.     object Label5: TsLabelFX
  1170.       Left = 8
  1171.       Top = 56
  1172.       Width = 47
  1173.       Height = 21
  1174.       AutoSize = False
  1175.       Caption = 'Ksi'#281#380'yc:'
  1176.       ParentFont = False
  1177.       Kind.KindType = ktCustom
  1178.       Kind.Color = clAqua
  1179.       Font.Charset = DEFAULT_CHARSET
  1180.       Font.Color = clWindowText
  1181.       Font.Height = -11
  1182.       Font.Name = 'MS Sans Serif'
  1183.       Font.Style = []
  1184.     end
  1185.     object dlugosc_dnia: TsLabelFX
  1186.       Left = 88
  1187.       Top = 24
  1188.       Width = 41
  1189.       Height = 21
  1190.       AutoSize = False
  1191.       Caption = '----'
  1192.       Kind.KindType = ktCustom
  1193.       Kind.Color = clYellow
  1194.     end
  1195.     object wschod_slonca: TsLabelFX
  1196.       Left = 88
  1197.       Top = 40
  1198.       Width = 41
  1199.       Height = 21
  1200.       AutoSize = False
  1201.       Caption = '----'
  1202.       Kind.KindType = ktCustom
  1203.       Kind.Color = clYellow
  1204.     end
  1205.     object wschod_ksiezyca: TsLabelFX
  1206.       Left = 88
  1207.       Top = 56
  1208.       Width = 41
  1209.       Height = 21
  1210.       AutoSize = False
  1211.       Caption = '----'
  1212.       Kind.KindType = ktCustom
  1213.       Kind.Color = clYellow
  1214.     end
  1215.     object zachod_slonca: TsLabelFX
  1216.       Left = 136
  1217.       Top = 40
  1218.       Width = 33
  1219.       Height = 21
  1220.       AutoSize = False
  1221.       Caption = '----'
  1222.       Kind.KindType = ktCustom
  1223.       Kind.Color = clYellow
  1224.     end
  1225.     object zachod_ksiezyca: TsLabelFX
  1226.       Left = 136
  1227.       Top = 56
  1228.       Width = 41
  1229.       Height = 21
  1230.       AutoSize = False
  1231.       Caption = '----'
  1232.       Kind.KindType = ktCustom
  1233.       Kind.Color = clYellow
  1234.     end
  1235.   end
  1236.   object MainMenu1: TMainMenu
  1237.     Left = 320
  1238.     Top = 320
  1239.     object Plik1: TMenuItem
  1240.       Caption = '&Plik'
  1241.       object Wyjcie1: TMenuItem
  1242.         Caption = '&Wyj'#347'cie'
  1243.         OnClick = Wyjcie1Click
  1244.       end
  1245.     end
  1246.     object Polecenia1: TMenuItem
  1247.       Caption = 'Po&lecenia'
  1248.       object Pobierzdane2: TMenuItem
  1249.         Caption = 'Pobierz &dane'
  1250.         Default = True
  1251.         ShortCut = 116
  1252.         OnClick = Pobierzdane1Click
  1253.       end
  1254.       object MapkiPolski1: TMenuItem
  1255.         Caption = 'M&apki Polski'
  1256.         object emperatura2: TMenuItem
  1257.           Caption = '&Temperatura'
  1258.           OnClick = emperatura1Click
  1259.         end
  1260.         object Cinienie2: TMenuItem
  1261.           Caption = '&Ci'#347'nienie'
  1262.           OnClick = Cinienie1Click
  1263.         end
  1264.         object Wiatr2: TMenuItem
  1265.           Caption = '&Wiatr'
  1266.           OnClick = Wiatr1Click
  1267.         end
  1268.         object N11: TMenuItem
  1269.           Caption = '-'
  1270.         end
  1271.         object Standrg1: TMenuItem
  1272.           Caption = '&Stan dr'#243'g'
  1273.           OnClick = Standrg1Click
  1274.         end
  1275.         object N14: TMenuItem
  1276.           Caption = '-'
  1277.           Enabled = False
  1278.         end
  1279.         object Maparadarowa2: TMenuItem
  1280.           Caption = 'Mapa radarowa'
  1281.           OnClick = Maparadarowa1Click
  1282.         end
  1283.         object Sumaopadw1: TMenuItem
  1284.           Caption = 'Suma opad'#243'w'
  1285.           OnClick = Sumaopadw1Click
  1286.         end
  1287.         object Stanwodywrzekach1: TMenuItem
  1288.           Caption = 'Stan wody w rzekach'
  1289.           OnClick = Stanwodywrzekach1Click
  1290.         end
  1291.         object Izotermy1: TMenuItem
  1292.           Caption = 'Izotermy'
  1293.           OnClick = Izotermy1Click
  1294.         end
  1295.         object Izobary1: TMenuItem
  1296.           Caption = 'Izobary'
  1297.           OnClick = Izobary1Click
  1298.         end
  1299.         object Zsatelity1: TMenuItem
  1300.           Caption = 'Z satelity'
  1301.           OnClick = Zsatelity1Click
  1302.         end
  1303.       end
  1304.       object Mapawyadowaatmosferycznych1: TMenuItem
  1305.         Caption = '&Mapa wy'#322'adowa'#324' atmosferycznych'
  1306.         object NiemcyPolska2: TMenuItem
  1307.           Caption = '&Polska - blids.de'
  1308.           OnClick = NiemcyPolska1Click
  1309.         end
  1310.         object Niemcyblidsde1: TMenuItem
  1311.           Caption = 'Niemcy - blids.de'
  1312.           OnClick = Niemcyblidsde1Click
  1313.         end
  1314.         object Holandiablidsde1: TMenuItem
  1315.           Caption = 'Holandia - blids.de'
  1316.           OnClick = Holandiablidsde1Click
  1317.         end
  1318.         object Szwajcariablidsde1: TMenuItem
  1319.           Caption = 'Szwajcaria - blids.de'
  1320.           OnClick = Szwajcariablidsde1Click
  1321.         end
  1322.         object N19: TMenuItem
  1323.           Caption = '-'
  1324.         end
  1325.         object PolskaIMGW2: TMenuItem
  1326.           Caption = 'Polska - IMGW'
  1327.           OnClick = PolskaIMGW1Click
  1328.         end
  1329.       end
  1330.       object Prognozy2: TMenuItem
  1331.         Caption = '&Prognozy'
  1332.         object PrognozawgICM2: TMenuItem
  1333.           Caption = '&ICM'
  1334.           object Meteorogram1: TMenuItem
  1335.             Caption = '&Meteorogram'
  1336.             OnClick = mm1Click
  1337.           end
  1338.           object Maemapki2: TMenuItem
  1339.             Caption = 'Ma'#322'e mapki'
  1340.             OnClick = Maemapki1Click
  1341.           end
  1342.           object Komentarzsynoptyka2: TMenuItem
  1343.             Caption = '&Komentarz synoptyka'
  1344.             OnClick = Komentarzsynoptyka1Click
  1345.           end
  1346.         end
  1347.         object undergroundcom1: TMenuItem
  1348.           Caption = 'W&underground.com'
  1349.           Visible = False
  1350.           OnClick = undergroundcom1Click
  1351.         end
  1352.         object N15: TMenuItem
  1353.           Caption = '-'
  1354.           Visible = False
  1355.         end
  1356.         object CinienienadEurop1: TMenuItem
  1357.           Caption = 'Ci'#347'nienie - Europa'
  1358.           Visible = False
  1359.           OnClick = CinienienadEurop1Click
  1360.         end
  1361.         object N17: TMenuItem
  1362.           Caption = '-'
  1363.         end
  1364.         object GFS: TMenuItem
  1365.           Caption = 'GFS-www.wetterzentrale.de'
  1366.           OnClick = GFSClick
  1367.         end
  1368.       end
  1369.       object Zdjciasatelitarne1: TMenuItem
  1370.         Caption = 'Zdj'#281'cia satelitarne'
  1371.       end
  1372.       object Inne2: TMenuItem
  1373.         Caption = 'Inne obrazy'
  1374.       end
  1375.       object Astro1: TMenuItem
  1376.         Caption = 'Astro'
  1377.         object OwietlenieZiemiprzezSoce1: TMenuItem
  1378.           Caption = 'O'#347'wietlenie Ziemi przez S'#322'o'#324'ce'
  1379.           OnClick = OwietlenieZiemiprzezSoce1Click
  1380.         end
  1381.         object Ksiyc1: TMenuItem
  1382.           Caption = 'Ksi'#281#380'yc'
  1383.           OnClick = Ksiyc1Click
  1384.         end
  1385.         object Ziemia2: TMenuItem
  1386.           Caption = 'Ziemia'
  1387.           OnClick = Ziemia2Click
  1388.         end
  1389.       end
  1390.       object N6: TMenuItem
  1391.         Caption = '-'
  1392.       end
  1393.       object Synchronizacjazegara2: TMenuItem
  1394.         Caption = '&Synchronizacja zegara'
  1395.         OnClick = Synchronizacjazegara1Click
  1396.       end
  1397.       object N7: TMenuItem
  1398.         Caption = '-'
  1399.       end
  1400.       object Opcje2: TMenuItem
  1401.         Caption = '&Opcje'
  1402.         ShortCut = 120
  1403.         OnClick = Opcje1Click
  1404.       end
  1405.     end
  1406.     object Pomoc1: TMenuItem
  1407.       Caption = 'Pomo&c'
  1408.       object Opis1: TMenuItem
  1409.         Caption = 'Opis'
  1410.         OnClick = Opis1Click
  1411.       end
  1412.       object FAQ1: TMenuItem
  1413.         Caption = 'FAQ'
  1414.         OnClick = FAQ1Click
  1415.       end
  1416.       object Historiazmian1: TMenuItem
  1417.         Caption = 'Historia zmian'
  1418.         OnClick = Historiazmian1Click
  1419.       end
  1420.       object Licencja1: TMenuItem
  1421.         Caption = 'Licencja'
  1422.         OnClick = Licencja1Click
  1423.       end
  1424.       object N5: TMenuItem
  1425.         Caption = '-'
  1426.       end
  1427.       object Sprawdczyjestnowawersja1: TMenuItem
  1428.         Caption = '&Sprawd'#378' czy jest nowa wersja'
  1429.         OnClick = Sprawdczyjestnowawersja1Click
  1430.       end
  1431.       object N8: TMenuItem
  1432.         Caption = '-'
  1433.       end
  1434.       object Oprogramie2: TMenuItem
  1435.         Caption = '&O programie...'
  1436.         OnClick = Oprogramie1Click
  1437.       end
  1438.     end
  1439.   end
  1440.   object akt_pog: TTimer
  1441.     Enabled = False
  1442.     OnTimer = akt_pogTimer
  1443.     Left = 216
  1444.     Top = 320
  1445.   end
  1446.   object czas_internetowy: TTimer
  1447.     Enabled = False
  1448.     OnTimer = czas_internetowyTimer
  1449.     Left = 216
  1450.     Top = 336
  1451.   end
  1452.   object zegar: TTimer
  1453.     OnTimer = zegarTimer
  1454.     Left = 248
  1455.     Top = 320
  1456.   end
  1457.   object polaczenie_test: TTimer
  1458.     Enabled = False
  1459.     Interval = 3000
  1460.     OnTimer = polaczenie_testTimer
  1461.     Left = 248
  1462.     Top = 336
  1463.   end
  1464.   object PopupMenu1: TPopupMenu
  1465.     Left = 284
  1466.     Top = 320
  1467.     object ShowWindow1: TMenuItem
  1468.       Caption = '&Poka'#380' okno programu'
  1469.       Default = True
  1470.       OnClick = ShowWindow1Click
  1471.     end
  1472.     object Schowaj1: TMenuItem
  1473.       Caption = '&Ukryj okno'
  1474.       OnClick = HideWindow1Click
  1475.     end
  1476.     object HideWindow1: TMenuItem
  1477.       Caption = 'P&obierz dane'
  1478.       OnClick = Pobierzdane1Click
  1479.     end
  1480.     object N21: TMenuItem
  1481.       Caption = '-'
  1482.     end
  1483.     object Opcje3: TMenuItem
  1484.       Caption = 'Opcje'
  1485.       OnClick = Opcje1Click
  1486.     end
  1487.     object N1: TMenuItem
  1488.       Caption = '-'
  1489.     end
  1490.     object Exit1: TMenuItem
  1491.       Caption = '&Wyj'#347'cie'
  1492.       OnClick = Wyjcie1Click
  1493.     end
  1494.   end
  1495.   object PopupMenu2: TPopupMenu
  1496.     Left = 320
  1497.     Top = 336
  1498.     object Pobierzdane1: TMenuItem
  1499.       Caption = 'Pobierz dane'
  1500.       Default = True
  1501.       ShortCut = 116
  1502.       OnClick = Pobierzdane1Click
  1503.     end
  1504.     object Mapki1: TMenuItem
  1505.       Caption = 'Mapki Polski'
  1506.       object emperatura1: TMenuItem
  1507.         Caption = 'Temperatura'
  1508.         OnClick = emperatura1Click
  1509.       end
  1510.       object Cinienie1: TMenuItem
  1511.         Caption = 'Ci'#347'nienie'
  1512.         OnClick = Cinienie1Click
  1513.       end
  1514.       object Wiatr1: TMenuItem
  1515.         Caption = 'Wiatr'
  1516.         OnClick = Wiatr1Click
  1517.       end
  1518.       object N12: TMenuItem
  1519.         Caption = '-'
  1520.       end
  1521.       object Standrg2: TMenuItem
  1522.         Caption = 'Stan dr'#243'g'
  1523.         OnClick = Standrg1Click
  1524.       end
  1525.       object N13: TMenuItem
  1526.         Caption = '-'
  1527.       end
  1528.       object Maparadarowa1: TMenuItem
  1529.         Caption = 'Mapa radarowa'
  1530.         OnClick = Maparadarowa1Click
  1531.       end
  1532.       object Sumaopadw2: TMenuItem
  1533.         Caption = 'Suma opad'#243'w'
  1534.         OnClick = Sumaopadw1Click
  1535.       end
  1536.       object Stanwodywrzekach2: TMenuItem
  1537.         Caption = 'Stan wody w rzekach'
  1538.         OnClick = Stanwodywrzekach1Click
  1539.       end
  1540.       object Izotermy2: TMenuItem
  1541.         Caption = 'Izotermy'
  1542.         OnClick = Izotermy1Click
  1543.       end
  1544.       object Izobary2: TMenuItem
  1545.         Caption = 'Izobary'
  1546.         OnClick = Izobary1Click
  1547.       end
  1548.       object Zsatelity2: TMenuItem
  1549.         Caption = 'Z satelity'
  1550.         OnClick = Zsatelity1Click
  1551.       end
  1552.     end
  1553.     object mapa1: TMenuItem
  1554.       Caption = 'Mapa wy'#322'adowa'#324' atmosferycznych'
  1555.       object Polskablidsde1: TMenuItem
  1556.         Caption = '&Polska - blids.de'
  1557.         OnClick = NiemcyPolska1Click
  1558.       end
  1559.       object NiemcyPolska1: TMenuItem
  1560.         Caption = 'Niemcy - blids.de'
  1561.         OnClick = Niemcyblidsde1Click
  1562.       end
  1563.       object Holandiablidsde2: TMenuItem
  1564.         Caption = 'Holandia - blids.de'
  1565.         OnClick = Holandiablidsde1Click
  1566.       end
  1567.       object Szwajcariablidsde2: TMenuItem
  1568.         Caption = 'Szwajcaria - blids.de'
  1569.         OnClick = Szwajcariablidsde1Click
  1570.       end
  1571.       object N20: TMenuItem
  1572.         Caption = '-'
  1573.       end
  1574.       object PolskaIMGW1: TMenuItem
  1575.         Caption = 'Polska - IMGW'
  1576.         OnClick = PolskaIMGW1Click
  1577.       end
  1578.     end
  1579.     object Prognozy1: TMenuItem
  1580.       Caption = 'Prognozy'
  1581.       object PrognozawgICM1: TMenuItem
  1582.         Caption = 'ICM'
  1583.         object mm1: TMenuItem
  1584.           Caption = 'Meteorogram'
  1585.           OnClick = mm1Click
  1586.         end
  1587.         object Maemapki1: TMenuItem
  1588.           Caption = 'Ma'#322'e mapki'
  1589.           OnClick = Maemapki1Click
  1590.         end
  1591.         object Komentarzsynoptyka1: TMenuItem
  1592.           Caption = 'Komentarz synoptyka'
  1593.           OnClick = Komentarzsynoptyka1Click
  1594.         end
  1595.       end
  1596.       object wundergroundcom1: TMenuItem
  1597.         Caption = 'Wunderground.com'
  1598.         Visible = False
  1599.         OnClick = undergroundcom1Click
  1600.       end
  1601.       object N16: TMenuItem
  1602.         Caption = '-'
  1603.         Visible = False
  1604.       end
  1605.       object CinienieEuropa1: TMenuItem
  1606.         Caption = 'Ci'#347'nienie - Europa'
  1607.         Visible = False
  1608.         OnClick = CinienienadEurop1Click
  1609.       end
  1610.       object N18: TMenuItem
  1611.         Caption = '-'
  1612.       end
  1613.       object GFSwwwwetterzentralede1: TMenuItem
  1614.         Caption = 'GFS-www.wetterzentrale.de'
  1615.         OnClick = GFSClick
  1616.       end
  1617.     end
  1618.     object Zdjciasatelitarne2: TMenuItem
  1619.       Caption = 'Zdj'#281'cia satelitarne'
  1620.     end
  1621.     object Inne1: TMenuItem
  1622.       Caption = 'Inne obrazy'
  1623.       object TMenuItem
  1624.       end
  1625.     end
  1626.     object Astro2: TMenuItem
  1627.       Caption = 'Astro'
  1628.       object OwietlenieZiemiprzezSoce2: TMenuItem
  1629.         Caption = 'O'#347'wietlenie Ziemi przez S'#322'o'#324'ce'
  1630.         OnClick = OwietlenieZiemiprzezSoce1Click
  1631.       end
  1632.       object Ksiyc2: TMenuItem
  1633.         Caption = 'Ksi'#281#380'yc'
  1634.         OnClick = Ksiyc1Click
  1635.       end
  1636.       object Ziemia1: TMenuItem
  1637.         Caption = 'Ziemia'
  1638.         OnClick = Ziemia2Click
  1639.       end
  1640.     end
  1641.     object N2: TMenuItem
  1642.       Caption = '-'
  1643.     end
  1644.     object Synchronizacjazegara1: TMenuItem
  1645.       Caption = 'Synchronizacja zegara'
  1646.       OnClick = Synchronizacjazegara1Click
  1647.     end
  1648.     object N3: TMenuItem
  1649.       Caption = '-'
  1650.     end
  1651.     object Opcje1: TMenuItem
  1652.       Caption = 'Opcje'
  1653.       ShortCut = 120
  1654.       OnClick = Opcje1Click
  1655.     end
  1656.     object N4: TMenuItem
  1657.       Caption = '-'
  1658.     end
  1659.     object Oprogramie1: TMenuItem
  1660.       Caption = 'Sprawd'#378' czy jest nowa wersja programu'
  1661.       OnClick = Sprawdczyjestnowawersja1Click
  1662.     end
  1663.   end
  1664.   object PopupMenu3: TPopupMenu
  1665.     Left = 280
  1666.     Top = 336
  1667.     object Pokawszystkiedane1: TMenuItem
  1668.       Caption = 'Poka'#380' wszystkie dane'
  1669.       OnClick = SGDblClick
  1670.     end
  1671.     object Historia1: TMenuItem
  1672.       Caption = 'Historia'
  1673.       OnClick = Historia1Click
  1674.     end
  1675.     object N22: TMenuItem
  1676.       Caption = '-'
  1677.     end
  1678.     object MeteogramzICM1: TMenuItem
  1679.       Caption = 'Meteorogram z ICM'
  1680.       Enabled = False
  1681.       OnClick = MeteogramzICM1Click
  1682.     end
  1683.     object PrognozazWUndergroundcom1: TMenuItem
  1684.       Caption = 'Prognoza z Wunderground.com'
  1685.     end
  1686.     object N9: TMenuItem
  1687.       Caption = '-'
  1688.       OnClick = akt_pogTimer
  1689.     end
  1690.     object Ustawjakogwnstacj1: TMenuItem
  1691.       Caption = '&Ustaw jako g'#322#243'wn'#261' stacj'#281
  1692.       OnClick = Ustawjakogwnstacj1Click
  1693.     end
  1694.   end
  1695.   object PopupMenu4: TPopupMenu
  1696.     Left = 360
  1697.     Top = 320
  1698.     object wwwwundergroundcomtrybszybki1: TMenuItem
  1699.       Caption = 'wunderground - tryb szybki'
  1700.       OnClick = wwwwundergroundcomtrybszybki1Click
  1701.     end
  1702.   end
  1703.   object PopupMenu5: TPopupMenu
  1704.     Left = 360
  1705.     Top = 336
  1706.     object Ustawjakogwnstacj2: TMenuItem
  1707.       Caption = 'Ustaw jako g'#322#243'wn'#261' stacj'#281':'
  1708.       Default = True
  1709.       Enabled = False
  1710.     end
  1711.     object N10: TMenuItem
  1712.       Caption = '-'
  1713.     end
  1714.   end
  1715.   object http: TIdHTTP
  1716.     OnStatus = httpStatus
  1717.     MaxLineAction = maException
  1718.     ReadTimeout = 6000
  1719.     OnWork = httpWork
  1720.     OnWorkBegin = httpWorkBegin
  1721.     OnWorkEnd = httpWorkEnd
  1722.     AllowCookies = False
  1723.     ProxyParams.BasicAuthentication = False
  1724.     ProxyParams.ProxyPort = 0
  1725.     Request.ContentLength = -1
  1726.     Request.ContentRangeEnd = 0
  1727.     Request.ContentRangeStart = 0
  1728.     Request.ContentType = 'text/html'
  1729.     Request.Accept = 'text/html, */*'
  1730.     Request.BasicAuthentication = False
  1731.     Request.UserAgent = 'Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)'
  1732.     HTTPOptions = [hoForceEncodeParams]
  1733.     Left = 392
  1734.     Top = 320
  1735.   end
  1736.   object abfAutoRun: TabfAutoRun
  1737.     Kind = aekUserRun
  1738.     Left = 544
  1739.     Top = 304
  1740.   end
  1741.   object IdAntiFreeze1: TIdAntiFreeze
  1742.     Left = 512
  1743.     Top = 304
  1744.   end
  1745.   object IdTime: TIdTime
  1746.     MaxLineAction = maException
  1747.     BaseDate = 2
  1748.     Left = 480
  1749.     Top = 304
  1750.   end
  1751.   object crypt: TDCP_blowfish
  1752.     Id = 5
  1753.     Algorithm = 'Blowfish'
  1754.     MaxKeySize = 448
  1755.     BlockSize = 64
  1756.     Left = 480
  1757.     Top = 336
  1758.   end
  1759.   object wav1: TabfWav
  1760.     NoWaitIfBusy = False
  1761.     Left = 152
  1762.     Top = 320
  1763.     FileData = {00000000}
  1764.   end
  1765.   object TextTrayIcon1: TTextTrayIcon
  1766.     CycleInterval = 0
  1767.     Icon.Data = {<image000.ico>}
  1768.     IconVisible = True
  1769.     IconIndex = 0
  1770.     PopupMenu = PopupMenu1
  1771.     OnClick = ShowWindow1Click
  1772.     Text = 'X'
  1773.     Font.Charset = DEFAULT_CHARSET
  1774.     Font.Color = clRed
  1775.     Font.Height = -9
  1776.     Font.Name = 'Arial'
  1777.     Font.Style = [fsBold]
  1778.     Border = False
  1779.     Options.OffsetX = 1
  1780.     Options.OffsetY = 0
  1781.     Options.LineDistance = 0
  1782.     Left = 544
  1783.     Top = 336
  1784.   end
  1785.   object ImageList4: TImageList
  1786.     Left = 608
  1787.     Top = 336
  1788.   end
  1789.   object abfOneInstance1: TabfOneInstance
  1790.     Message = 'Program Pogoda jest ju'#380' uruchomiony'
  1791.     ShowMessage = True
  1792.     Left = 576
  1793.     Top = 320
  1794.   end
  1795.   object zmianaIkony: TTimer
  1796.     Enabled = False
  1797.     Interval = 3000
  1798.     OnTimer = zmianaIkonyTimer
  1799.     Left = 104
  1800.     Top = 320
  1801.   end
  1802.   object JvFormMagnet1: TJvFormMagnet
  1803.     Active = True
  1804.     Left = 512
  1805.     Top = 336
  1806.   end
  1807. end
  1808.